(Fcall_process): Don't close the same fd twice.

diff --git a/src/callproc.c b/src/callproc.c
index 265d82877230fcbe830f7ce75820fc3f90d7fba5..4d84c98edb7753162567751eb7d916dca45538a1 100644 (file)
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -458,7 +458,7 @@ If you quit, the process is killed with SIGINT, or SIGKILL if you quit again.")
     /* Close most of our fd's, but not fd[0]
        since we will use that to read input from.  */
     close (filefd);
-    if (fd1 >= 0)
+    if (fd1 >= 0 && fd1 != fd_error)
       close (fd1);
   }